home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 6 (Reseller Edition) / Apple Ref. & Pres. Lib.v6.0.toast / pc / 3-Presentations / Markets / Education / HyperCard In Education / Plate Tectonics / card_3246.txt < prev    next >
Text File  |  1990-04-02  |  6KB  |  249 lines
  1. -- card: 3246 from stack: in
  2. -- bmap block id: 11387
  3. -- flags: 0000
  4. -- background id: 2769
  5. -- name: General Processes and Terms
  6. ----- HyperTalk script -----
  7. on closeCard
  8.   cleanexit
  9.   hide cd btn id 16
  10.   hide cd btn id 17
  11. end CloseCard
  12.  
  13.  
  14.  
  15. -- part 1 (field)
  16. -- low flags: 80
  17. -- high flags: 0002
  18. -- rect: left=297 top=224 right=314 bottom=512
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 0
  22. -- font id: 3
  23. -- text size: 12
  24. -- style flags: 0
  25. -- line height: 16
  26. -- part name: 
  27.  
  28.  
  29. -- part 14 (button)
  30. -- low flags: 00
  31. -- high flags: A002
  32. -- rect: left=51 top=137 right=155 bottom=171
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 2
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Asthenosphere
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.  
  44.   global fieldname, oldname
  45.  
  46.   put the short name of me into fieldname
  47.   lock screen
  48.  
  49.  
  50.   set the visible of  cd btn id 17 to not the visible of  cd btn id 17
  51.   set the visible of card field fieldname to not the visible of cd field fieldname
  52.  
  53.   unlock screen with visual dissolve
  54.  
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 9 (button)
  60. -- low flags: 00
  61. -- high flags: 8002
  62. -- rect: left=78 top=86 right=105 bottom=172
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 1
  66. -- font id: 2
  67. -- text size: 10
  68. -- style flags: 0
  69. -- line height: 13
  70. -- part name: Lithosphere
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   --repeat with i=1 to number of card fields
  74.   --lock screen
  75.   -- hide card field i
  76.   -- unlock screen with visual dissolve fast
  77.   -- end repeat
  78.  
  79.   global fieldname, oldname
  80.   if the visible of card field "asthenosphere" is true then
  81.     send mouseup to card field "asthenosphere"
  82.   end if
  83.  
  84.   put the short name of me into fieldname
  85.   lock screen
  86.  
  87.  
  88.   set the visible of card btn id 16 to not the visible of card btn id 16
  89.   set the visible of card field fieldname to not the visible of cd field fieldname
  90.  
  91.   unlock screen with visual dissolve
  92.  
  93. end mouseUp
  94.  
  95.  
  96.  
  97. -- part 7 (field)
  98. -- low flags: 81
  99. -- high flags: 0004
  100. -- rect: left=132 top=80 right=326 bottom=386
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 0 / 0
  103. -- text alignment: 0
  104. -- font id: 3
  105. -- text size: 12
  106. -- style flags: 256
  107. -- line height: 16
  108. -- part name: lithosphere
  109. ----- HyperTalk script -----
  110. on mouseUp
  111.   set locktext of me to true
  112.   global fieldname
  113.   lock screen
  114.   hide me
  115.   --hide card button fieldname
  116.   hide card btn id 16
  117.   unlock screen with visual dissolve
  118. end mouseup
  119.  
  120.  
  121.  
  122. -- part 16 (button)
  123. -- low flags: 80
  124. -- high flags: C000
  125. -- rect: left=132 top=80 right=111 bottom=382
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 1
  129. -- font id: 2
  130. -- text size: 18
  131. -- style flags: 256
  132. -- line height: 24
  133. -- part name: Lithosphere
  134. ----- HyperTalk script -----
  135. on mouseUp
  136.   set hilite of me to true
  137.   global fieldname
  138.   lock screen
  139.   hide me
  140.   --hide card button fieldname
  141.   hide card btn id 16
  142.   hide card field "lithosphere"
  143.   unlock screen with visual dissolve
  144. end mouseUp
  145.  
  146.  
  147.  
  148. -- part 12 (field)
  149. -- low flags: 81
  150. -- high flags: 0004
  151. -- rect: left=134 top=52 right=342 bottom=423
  152. -- title width / last selected line: 0
  153. -- icon id / first selected line: 0 / 0
  154. -- text alignment: 0
  155. -- font id: 3
  156. -- text size: 12
  157. -- style flags: 256
  158. -- line height: 16
  159. -- part name: asthenosphere
  160. ----- HyperTalk script -----
  161. on mouseUp
  162.   set locktext of me to true
  163.   global fieldname
  164.   lock screen
  165.   hide me
  166.   --hide card button fieldname
  167.   hide cd btn id 17
  168.   unlock screen with visual dissolve
  169. end mouseup
  170.  
  171.  
  172.  
  173. -- part 17 (button)
  174. -- low flags: 80
  175. -- high flags: C000
  176. -- rect: left=135 top=52 right=83 bottom=420
  177. -- title width / last selected line: 0
  178. -- icon id / first selected line: 0 / 0
  179. -- text alignment: 1
  180. -- font id: 2
  181. -- text size: 18
  182. -- style flags: 256
  183. -- line height: 24
  184. -- part name: Asthenosphere
  185. ----- HyperTalk script -----
  186. on mouseUp
  187.   set hilite of me to true
  188.   global fieldname
  189.   lock screen
  190.   hide me
  191.   hide card field fieldname
  192.   --hide card button fieldname
  193.   hide card btn id 16
  194.   hide card field "lithosphere"
  195.   unlock screen with visual dissolve
  196. end mouseUp
  197.  
  198.  
  199.  
  200. -- part 18 (button)
  201. -- low flags: 00
  202. -- high flags: A002
  203. -- rect: left=16 top=319 right=340 bottom=76
  204. -- title width / last selected line: 0
  205. -- icon id / first selected line: 0 / 0
  206. -- text alignment: 1
  207. -- font id: 0
  208. -- text size: 12
  209. -- style flags: 0
  210. -- line height: 16
  211. -- part name: Return
  212. ----- HyperTalk script -----
  213. on mouseUp
  214.   global ReturnCard
  215.   go ReturnCard
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part contents for background part 1
  221. ----- text -----
  222. General Terms
  223.  
  224. -- part contents for card part 1
  225. ----- text -----
  226. include:
  227. lithosphere, asthenosphere, crust(continental and oceanic)convection currents continental drift
  228.  
  229. -- part contents for card part 7
  230. ----- text -----
  231.  
  232.  
  233. The lithosphere is the brittle outermost layer of the earth which is broken into plates. It includes all of the crust and part of the upper mantle.
  234.  
  235. Composition: 
  236.       Primarily Basalt except for 
  237.       continental crust which is
  238.       granitic.
  239.  
  240.  
  241. -- part contents for card part 12
  242. ----- text -----
  243.  
  244.  
  245. The asthenosphere is layer of semi-molten rock below the lithosphere and is the source of magma that ultimately reaches the surface as lava.
  246.  
  247. Its composition is mafic (same as the lithosphere) but due to extreme HEAT and PRESSURE it can flow very slowly.
  248.  
  249. Convection currents within the asthenosphere are thought to be the driving force of plate movement.